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COMPUTEPHEWS  SUBSCRIPTinN  RENEWAL 


All  CO^!PTITERNEWS  subscribers 
are  reminded  that  they  must 
complete  a  copy  of  the  COMPUTERNEWS 
ADDRESS  FORM  and  return  it  to  the 
Information  Office,  SF128  before 
Friday,  March  21,  1*^75  if  they  wish 
to  continue  receiving  the  UTCC 
newsletter. 

A  copy  of  the  ADDRESS  FORM 
appears  on  the  back  cover  of  this 
issue  of  COMPUTEPvNEWS ,  The  form  is 
pre-addressed  and  can  be  returned 
free-of-charge  via  cainnus  mail. 
Subscription  changes  will  go  into 
effect  with  the  March  1975  issue  of 
COMPUTERNETJS .  Subscription 
enquiries  should  be  directed  to 
June  Bridges  at  928-4990. 

Janet  Campbell 


ATTENTION  ALL  USERBOOK  SUBSCRIBERS 


The  revised,  modular  USERBOOK 
will  be  distributed  during  the 
first  week  of  March,  1975.  Current 
USERBOOK  subscribers  are  reminded 
that  vrith  the  distribution  of  the 
revised  edition,  the  old  USERBOOK 
becomes  obsolete  and  no  further 
updates  will  be  issued  to 
subscribers  who  have  failed  to 
return  the  USERBOOK  Order  Form 
mailed  to  them  in  January,  1975. 

As  was  outlined  in  the 
instructions  included  r-rlth  the 
Order  Form,  subscribers  are  asked 
to  follow  the  procedures  listed 
below  upon  receipt  of  the  revised 
USERBOOK: 


—  Check  to  ensure  that  all 

modules  and  Sections  you 
requested  are  included  in  your 
new  USERBOOK.  Any 

discrepancies  should  be 
reported  to  the  Information 
Office  SF128,  928-4990  or  928- 
4991. 

—  If  you  have  chosen  to  include 
Section  2  (Advanced  General) 
and/or  Section  4  (Interactive 
Svstem/360-65  Services)  in  your 
new  USERBOOK,  these  Sections 
must  be  transferred  from  your 
old  copy  to  your  new  copy, 

—  Before  assembling  your  modular 

USERBOOK,  please  review  the 
explanation  of  the  USERBOOK 
numbering  system.  The 

numbering  system  for  all 
Sections  or  base  modules  is 
described  on  page  1.1040  in 
Section  1;  the  numbering  system, 
for  optional  modules  is 
described  on  page  3.0005-2  in 
Section  3. 

If  you  have  any  questions  or 
problems  concerning  the  revised 
USERBOOK,  please  contact  Don  Gibson 
at  928-5568  or  Janet  Campbell  at 
928-2066.  Copies  of  the  Order  Form 
are  available  at  the  Information 
Office,  SF128,  phone  928-4990  or 
928-4991. 

Janet  Campbell 


CHANGES  TO  PHONE  LIST 


The  following  changes  have  been 
made  to  the  phone  list  that 
appeared  in  last  month’s  issue  of 
COMPUTERNEWS.  Numbers  listed  in 
last  month’s  article  that  do  not 
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CHANGES  TO  THE  PHONE  LIST  Cont’d.  COURSE  —  "APL  FOR  SCIENTISTS  AND 

ENGINEERS" 


appear  here 
numbers  given 
together  with 

remain  the  same.  The 
below  are  final,  and 
the  unchanged  numbers 

Prerequisite 

:  Familiarity  with  APL 

from  last 

month's  listing. 

as  presented  in  the 

constitute  a 

permanent  phone  list. 

IBM  APL/ 360  User's 

NAME 

PHONE 

Date: 

Manual  (GH20-0906-1) 
March  24,  26,  28 

Marilyn  Hall 

4869 

Time: 

Maximum  #  of 

3-5  p.m. 

Registrants : 

Dave  Hart 

6281 

Enrollment  will  be 

Sean  Keeley 

6876 

limited  to  the  first 

Herb  Kugel 

7286 

25  applicants  and  is 

Jaime  Menende2 

:  6133 

restricted  to 

Len  Prep as 

6878 

faculty,  graduate 

John  Roth 

8701 

students  or  staff. 

Dave  Scobie 

6877 

Instructor: 

Ernst  Goetze 

Joyce  Walton 

6875 

Margo  Harvie 


ADVISORS  NEEDED 


During  the  1975-1976  academic 
year  there  will  he  positions 
available  for  both  High  Speed  Job 
Stream  Advisors  and  General  Purpose 
Job  Stream  Advisors  at  the  Sandford 
Fleming  Terminal  and  at  the  Arts 
and  Science  Terminal.  Application 
forms  are  available  from  the 
Terminal  Co-ordinators.  A  summary 
sheet  which  describes  the 
qualifications  necessarv  for  the 
jobs,  is  also  available. 


The  course  is  intended  to 
assist  engineers  and  scientists  in 
rapidly  defining  and  solving 
computational  problems  in  the 
programming  language  APL.  Some 
aspects  of  the  APL  interpreter  and 
360  arithmetic  useful  to  the 
scientific  programmer  will  be 
discussed.  This  course  is  problem 
oriented  and  in  solving  several 
core  problems,  topics  such  as 
function  definition  and  assignment, 
linear  equations  and  matrix 
analysis,  curve  fitting,  graphics 
and  format,  numerical  integration, 
ordinary  differential  equations, 
optimal  search  methods  and  the 
simulation  of  a  stochastic  process 
will  be  covered. 


The  course  will  take  place  on 
Mark  Tapia  the  St.  George  campus.  A  pre¬ 

addressed  registration  form  is 
included  as  a  supplement  to  this 
issue  of  COMPUTERNEWS  and  may  be 
returned  via  campus  mail  free-of- 
charge.  This  form,  with  the  room 
number  in  which  the  course  will 
meet,  will  be  returned  to  you  as 
confirmation  of  your  enrollment. 


Don  Gibson 
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AEDS  WORKSHOP 


The  sixth  annual  AEDS 
(Association  for  Educational  Data 
Systems)  workshop  on  the 
development  and  evaluation  of 
educational  programs  in  computer 
science  and  data  processing  will  be 
held  at  the  Holiday  Inn — North,  St. 
Louis,  Missouri  on  Friday,  March 
14,  1975.  This  workshop  is 
recommended  for  educators  and 
administrators  who  are  developing, 
planning  or  evaluating  computing 
courses  and  curricula  for  programs 
not  necessarily  leading  to  a 
bachelor’s  degree. 

The  following  excerpt  from  the 
AEDS  WORKSHOP  promotional  brochure 
describes  the  topics  which  t-tLII  be 
discussed: 

A  staff  of  educators  in  the 
fields  of  computer  science  and  data 
processing  will  discuss  course 
content,  curricula  and  many  other 
aspects  of  presenting  educational 
programs  in  computer  science  that 
Include  the  areas  of  programming 
languages,  computing  techniques, 
information  structures,  business 
data  processing,  numerical  methods, 
programming  systems,  information 
processing,  design  of  computers, 
computer  aided  instruction,  time 
sharing,  statistical  methods  and 
operations  research.  The 
discussions  t^tIII  emphasize  both 
course  content  and  the  problems 
associated  with  Implementing  an 
educational  urogram  in  computer 
science.  Proposed,  nev7  and 
existing  computer  science  programs 
will  be  discussed.  An  evaluation 
V7ill  be  made  of  courses  and  degree 
programs  especially  designed  to 
prepare  teachers  of  information  and 
computer  sciences.  The  needs  of 
Industry  will  be  identified  and 
recommendations  will  be  made  on  how 


educational  institutions  should 
meet  these  needs.  An  attempt  will 
be  made  to  describe  the 
requirements  that  are  not  being  met 
and  how  these  requirements  can  be 
fulfilled.  The  similarities  and 
differences  between  existing 
academic  programs  will  be 
evaluated.  The  placement  of  the 
graduate  of  two-year  technical 
programs  in  computer  science  will 
be  considered  as  v/ell  as  a  future 
demand  for  such  graduates. 

The  advance  registration  fee 
for  the  workshop  is  $40  for  AEDS 
members  and  $45.00  for  others. 
Closing  date  for  advance 
registration  is  March  7.  Late 
registration  wl.ll  be  accepted  on  a 
space  available  basis  after  that 
date  and  will  be  an  additional 
$10.00. 

Copies  of  the  registration  form 
are  available  from  the  Information 
Office,  SF128. 

Janet  Campbell 


PROFESSIONAL  DEVELORIENT  COURSE 


Four  courses  designed  for 
programmers  and  suoervisory 
personnel  'will  be  offered  by  the 
Institute  of  Computer  Science  in 
May,  1975  at  the  University  of 
Guelph.  The  courses,  described 
below,  are  open  to  all  faculty  and 
staff  of  Ontario  universities. 


cont *d. . . 
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DEVELOPMENT  COURSE  Cont’d. 

Database  Concepts 

Date:  Mav  5  -  May  6 

Instructor:  Mr,  H.  LDirbach, 

DBD  Systems  Inc, 
Price:  $170,00  per  person 

LTio  Should  Attend: 

Data  processing  management, 
senior  technical  personnel  in 
data  processing  and  general 
management  users  of  data 

processing. 

The  seminar  is  oriented  toward 
those  members  of  Management  who 
require  a  general  understanding  of 
the  nature  of  the  data  base  and 
Oeneralized  Data  Base  Management 
Systems,  their  impact  on  the 
organization,  and  the  definition  of 
an  environment  in  which  the  data 
base  functions  most  effectively. 
Emphasis  is  placed  upon  the 

justification  of  a  data  base 

effort,  long  range  planning  for 
implementation,  and  ultimate 
evaluation  of  performance  and 
effectiveness.  The  seminar 

addresses  the  basic  question  "Why  a 
Data  Base,  and  what  does  it  mean  to 
the  organization?" 

Advanced  Programming  Techniques 

Date:  May  7  -  May  9 

Instructor:  Mr.  C,  S,  Matheny 

Price:  $200,00  ner  nerson 

Who  Should  Attend: 

Programmers,  analysts  and 
technical  sunervlsors  and 
managers.  Also  recommended  for 
those  resnonsible  for  training 
and  educating  programmers. 


This  course  embraces  a  range  of 
programming  skills  rarely  covered 
in  the  basic  training  offered  by 
hardware  suppliers.  These 

"advanced"  techniques  are 

applicable  to  any  computer 
Installation  in  any  of  the  major 
programming  languages.  The 

intention  is  for  participants  to 
leave  the  course  T.zith  practical 
ideas  which  can  be  readily  applied 
in  their  own  installations. 

Project  Management 

Date:  Mav  7  -  May  9 

Instructor:  Mr.  L,  R.  Clark 

Price:  $215.00  per  person 

I'Jho  Should  Attend: 

Those  v7ho  concurrently  direct 
the  work  of  programmers, 
analysts  and  other  software  or 
systems  personnel. 

Emphasis  will  be  placed  on 
understanding  a  management-by- 
objective  philosophy  and  the 
application  of  this  apnroach  to 
software  functions.  The  managerial 
activities  of  planning,  executing, 
reviewing  and  developing 

professional/technical  personnel 
will  be  included.  Many  of  the 
concepts  of  Drucker,  McGregor  and 
Herzberg  will  be  applied  to  form  a 
practical,  results-orlented  system 
of  programming  management.  The 
seminar  will  not  concentrate  upon 
project  management  techniques. 

Innovation  and  Creativity 

Date :  open 

Instructor:  Dr.  F,  D.  Barret, 

Management  Concepts  Ltd. 
Price:  $150.00  per  person 


cont *d. . 
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DEVELOPMENT  COURSE  Cont’d. 

Who  Should  Attend: 

Supervisors  and  Managers  who 
are  responsible  for  planning  of 
services. 

This  course  \^11  teach  vou  how 
to  use  your  organization’s 
resources  of  brain  power  to  adapt, 
innovate  and  produce  new  results. 
It  is  based  on  practical  work  done 
over  the  last  seven  years  in  a 
score  of  leading  Canadian  and 
American  companies,  schools  and 
government  departments. 

University  of  Toronto  faculty 
or  staff  interested  in  attending 
any  of  these  courses  should  contact 
Stan  Yagi,  SG202,  928-7331  by 
Friday,  March  7,  1975. 

Stan  Yagi 


THE  6TH  ONTARIO  UNIVERSITIES 

CO>tPUTING  CONFERENCE 


The  6th  Ontario  Universities 
Computing  Conference  will  be  held 
on  the  26th,  27th,  and  28th  of  May, 
1975,  at  the  University  of  Western 
Ontario, 

The  subiect  of  the  Conference 
Thrill  be  "Computer  Services  in  the 
Second  Half  of  the  1970 *s".  The 
Conference  will  deal  with  such 
topics  as  present  information 
processing  services,  future  service 
offerings  and  management 
prenaration.  The  Conference  should 
appeal  particularly  to  senior 
technical  staff  and  managers, 
directors  of  computing  centres,  and 
computer  policy  committee  members 
in  Canadian  universities  and 
colleges. 


The  Conference  Chairman  is  C, 
T,  Lake,  Director  of  the  Computinpr 
Centre  at  the  University  of  Western 
Ontario.  The  Conference 
registration  fee  will  be  $50.00. 


SHARE  PROGRAM  LIBRARY 


Share  Incorporated  is  a  world 
educational  and  scientific 
organization  comprised  of  members 
from  installations  with  computing 
systems  built  around  IBM  central 
processing  units.  A  special  form 
of  membership  is  also  permitted  for 
organizations  supplying  products 
suitable  as  components  of,  or 
adjunct  to,  "SHARE  machines". 

The  principal  purpose  of  SHAP-E 
is  to  foster  the  development  and 
exchange  of  technical  information 
through  its  project  activities, 
session  presentations,  meetings, 
discussion  groups,  forums,  panels, 
lectures  and  published  literature. 

One  of  the  earliest  projects  to 
evolve  since  the  first  SHARE 
meeting  in  August  1955  was  the 
development  of  a  formal  program 
exchange,  the  SHARE  Program 
Library.  The  SHARE  Program  Library 
is  a  collection  of  program  packages 
submitted  by  the  participating 
SHARE  installations,  to  promote  the 
exchange  of  technical  information, 
lower  softvjare  development  costs 
and  to  help  minimize  duplication  of 
effort. 

The  work  of  receiving, 
processing  and  distributing  the 
Library  materials  is  performed  by 
the  SHARE  Program  Library  Agency 
(SPLA) ,  presently  located  at 
Triangle  Universities  Computation 
Centre  (TUCC)  in  North  Carolina. 


cont  *  d . . , 
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SHARE  PROGRAM  LIBRARY 

Cont 'd 

TUCC  serves  only 

as 

the 

distribution  agent  for 

code 

and 

documentation  contributed 

in 

the 

original  and  does  not 

test 

or 

maintain  these  programs. 

Contributing  Programs: 

Any  SHARE  member  mav  submit 
programs  to  the  Library.  The 
submittor  is  responsible  for 
providing  SPLA  T-Tith  a  minimum 
package  consisting  of: 

—  submittal  form  (completed  by  the 
author) 

—  nrogram  abstract 

—  program  T-Triteup 

—  source  nrogram 

—  object  program  (ontional) 

—  sample  problems 

For  further  information  on  how 
to  submit  a  program  to  the  SPLA  in 
accordance  Td-th  SHARE  standards, 
refer  to  the  "SHARE  Reference 
Manual"  in  the  UTCC  Technical 
Reference  Centre,  Sir  Sandford 
Fleming  Labs,,  Room  128. 

Ordering  Programs: 

The  standard  distribution 
includes  one  copy  of  the 
documentation  and  one  copy  of  all 
machine-readable  materials  provided 
by  the  submittor.  Normally  the 
distribution  tM.11  be  of  the  most 
recent  version  of  the  program  but 
older  versions  can  be  made 
available  bv  special  arrangements. 
SPLA  will  shin  only  programs  in  the 
360-370D  Series,  since  most  the 
3000  and  7000  Series  programs  have 
now  been  retired. 


A  subscription  fee  to  the 
Library  is  not  required  and  the 
price  of  programs  is  the  same  for 
SHARE  and  non-SHARE  members  ($30, 
North  American  continent) .  This 
charge,  to  be  prepaid,  is  intended 
to  cover  only  the  distribution 
expense  of  a  basic  program  package 
(600  ft.  9-track  tape,  up  to  20 
pages  of  documentation  and  airmail 
postage) , 

A  complete  listing  of  available 
SPARE  program.s  along  vTith  ordering 
instructions  and  other  services  can 
be  found  in  the  UTCC  Technical 
Reference  Centre.  The  TRC  also 
houses  a  sizeable  collection  of 
these  programs  to  meet  our  users' 
special  needs. 

For  further  information  on  the 
SHARE  Program  Library  and  SPLA, 
contact  Marg  Doherty  at  928-8995. 

Marg  Doherty 


STRUCTURED  SUBSETS  OF  PL /I 


During  the  last  year,  a  special 
PL /I  compiler  has  been  in  use  at 
the  University  of  Toronto  Computer 
Centre.  This  compiler  supports 
"structured  subsets  of  PL/I", 
called  SP/k,  which  have  been 
designed  to  encourage  good 
programming.  The  compiler  was 
developed  bv  the  Computer  Systems 
Research  Group  under  the  direction 
of  Professors  Holt  and  Wortman  at 
the  University  of  Toronto.  These 
subsets  of  PL/I  are  compatible  with 
PL/I  as  supported  by  the  PL/C, 
PL/I-F,  IBM  Check  Out  and  IBM 
Optimizer  compilers. 


cc  nt '  d . 
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STRUCTURED  SUBSETS  OF  PL /I  ContM. 

Heavy  usage:  The  special 
compiler  for  SP/k,  called  SP/k/360, 
has  had  heavy  usage.  It  has  been 
used  by  introductory  computer 
science  courses  at  the  University 
of  Toronto  and  by  several  Toronto 
high  schools.  During  the  fall 
term,  1974,  over  50,000  jobs  per 
month  were  processed  by  SP/k/360  on 
the  High  Speed  Job  Stream.  The 
compiler  has  been  used  under  MVT, 
VS/2  and  DOS. 

Highly  Reliable:  The  SP/k/360 
compiler  is  one  of  the  most 
reliable  compilers  used  at  UTCC. 
It  has  no  known  bugs. 

Highly  Diagnostic:  The  SP/k/360 
compiler  accepts  student 
programming  errors  gracefully.  It 
repairs  lines  containing  svntax 
errors  and  displays  the  repaired 
source  line.  The  treatment  of 
errors  by  SP/k  seems  to  be  as  good 
as  any  other  compiler  at  UTCC. 

Small  Region:  It  is  possible  to 
run  SP/k/360  in  a  very  small 
region.  A  tailored  version  for 
DOS/360  runs  in  about  90K  bytes. 
It  would  be  possible  to  run 
SP/k/360  in  less  than  50K  bytes  if 
necessary. 

The  Subsets :  The  SP/k  subsets 
are  called  SP/1,  SP/2,  SP/3  and  so 
on.  Each  successive  subset 
introduces  new  nrograraming  language 
features  while  keeping  the  features 
of  the  previous  subsets.  Briefly, 
the  subsets  are  as  follovrs. 


SP/1  “  Output (PUT  LIST)  and  ex¬ 
pressions 

SP/2  -  Variables,  input  and  assign¬ 
ment 

SP/3  -  Selection  and  repetition 
(IF  and  DO) 

SP/4  -  Character  strings 
SP/5  -  Arrays 

SP/6  -  Procedures  (subroutines 
and  functions) 

SP/7  -  Formatted  input /output 
SP/8  -  Record  input /output  and 
PL/I  structures 

At  present,  SP/k/360  supports  the 
first  six  subsets.  Complete 

specifications  for  these  six 
subsets  are  available  as  the  module 
entitled  3.6HSSPK  of  the  UTCC 
USERBOOK. 

SP/k  vs.  PL/C:  Programs  written 
in  the  SP/k  subsets  can  be  run 
under  PL/C.  The  SP/k/360  compiler 
purposely  supports  less  features  of 
PL /I  than  does  PL/C.  For  example, 
SP/k/360  does  not  support  GO  TO,  ON 
units  and  explicit  precisions 
because  these  features  tend  to  lead 
to  confusing  urograms.  Many 
teachers  feel  that  the  restrictions 
imposed  by  SP/k/360  make  it  easier 
to  teach  structured  programming. 
The  SP/k/360  compiler  has  the 
advantage  that  it  automatically 
paragraphs  (Indents)  student’s 
programs.  The  SP/k/360  compiler 
supports  special  mark  sense  cards, 
as  well  as  punched  cards,  for 
schools  in  which  keypunches  are  not 
available. 


cont’d 
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STRUCTURED  SUBSETS  OF  PL /I  Cont’d. 

PDP-11  compiler  for  SP/k; 
Another  compiler  for  SP/k,  called 
SP/k/ 11,  runs  SP/k  jobs  on  the 
Digital  Equipment  PDP-11 
minicomputer,  x-rLth  disk,  printer 
and  reader.  SP/k/11  is 
functionally  eauivalent  to 
SP/k/360,  In  fact,  they  are  really 
the  same  compiler,  written  in  a 
high  level  language  called  SUE. 
Basically,  SP/k/11  is  SP/k/360 
recompiled  ^Tith  the  generation  of 
PDP-11  machine  code  instead  of  360 
machine  code.  (Actually  it  is  not 
quite  that  easy) .  A  PDP-11  running 
SP/k  is  scheduled  to  be  installed 
by  March  in  a  Toronto  high  school. 

_A  textbook  for  SP/k; 
Professors  Hume  and  Holt  of  the 
Departm.ent  of  Computer  Science  are 
completing  a  text  called  Structured 
Programming  -  Using  Subsets  of  PL/i 
called  SP/k.  This  text  is  being 
published  by  Reston,  a  Prentice- 
Hall  subsidiary  and  is  supposed  to 
be  available  for  Fall  1975  classes. 
The  text  could  be  used  v/lth 
SP/k/360,  SP/k/11,  PL/C  or  any 
other  compiler  supporting  at  least 
the  SP/k  subsets  of  PL/I. 

Distribution  of  the  SP/k 
Compilers ;  Versions  of  the  SP/k 
compilers  for  OS/360,  DOS/360  and 
the  PDP-11  are  to  be  available  for 
distribution  for  use  in  Fall  1975 
classes.  For  details,  write  SP/k 
Distribution,  Computer  Systems 
Research  Group,  Room  216,  Sir 
Sandford  "Pleming  Lab.  ,  University 
of  Toronto,  Toronto,  Canada,  M5S 
lAl. 

Richard  Holt  and  David  ^Jortman 


PERSONNEL  CHANGES 


Leaving  the  Centre  this  month 
is  Gerry  Sauer  who  is  transferring 
within  the  University  to  the 
Information  Systems  Department. 
Also  leaving  this  month  is  Barbara 
Ablett  of  the  Administration  Group. 
Good  luck  in  your  new  endeavours. 

February  brings  us  five  new 
employees;  Alfred  Schall,  Di-Anne 
Madlll,  Bassey  Akpan  and  Agnes 
Obeng.  Alfred  is  a  computer 
operator  at  709A,  Di-Anne  is  the 
secretary  for  Applications  Support 
and  Services ,  Bassey  and  Agnes  are 
data  entry  operators  in  the 
Applications  Support  area.  I  hope 
you  Xi^ll  find  your  work  here 
satisfying  and  enjoyable. 

Trudy  Holland 


RECENT  ACQUISITIONS  IN  THE 
DEPARTMENT  OF  COMPUTER  SCIENCE 
LIBRARY 


Dahlquist,  Germund  and  Bj8rck,  A. 

Numerical  methods. 

Englewood  Cliffs,  N.J.,  Prentice- 
Hall,  197A. 

Forrester,  Jay  W. 

Urban  dynamics. 

Cambridge,  Mass.,  M.I.T.  Press, 
1969. 

Friedman,  Daniel  P. 

The  little  LISPer. 

Chicago,  Science  Research  Assoc., 
1974. 


cont’d. . . 
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RECEIPT  ACQUISITIONS  Cont'd. 

Jerusalem  Conference  on  Information 
Technology,  2d,  1974. 

Coraouters  for  social  and  economic 
development.  Conference 
proceedings,  v.l,  ed.  by  C.C. 
Gotlieb  and  H.  Maisel. 

Jerusalem,  ILTAM,  1974. 

Katzan,  Harry. 

Comnuter  data  security. 

New  York,  Van  Nostrand  Reinhold,  1973, 

Pollack,  Seymour  V.  and  Sterling,  T.D. 

Essentials  of  PL/I. 

New  York,  Holt,  Rinehart  and  Winston, 
1974. 

Turn ,  Rein . 

Computers  in  the  1980s. 

New  York,  Columbia  University  Press, 
1974. 

Schriber,  Thomas  J. 

Simulation  using  GPSS. 

New  York,  Wiley,  1974. 
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FORTRAN  LIBRARY  UPGRADE 


The  System  default  FORTRAN 
Program  Product  library 
SYSl.FORTLIB  Xvras  ungraded  on 
February  17,  1975.  PTF16  and  a  few 
other  fixes  have  been  included  in 
the  modification.  The  upgrade  will 
correct,  among  other  things,  the 
predominant  OCA  ABENDS  at  return  in 
VS. 

Users  who  have  questions  or 
problems  should  contact  Kin  Fong  at 
92 8-492 A. 

Kin  Fong 


RANDOM  NUMBER  GENERATORS 


The  folloTiring  copy  of  a  memo 
from  David  Andrews  and  the  relevant 
computer  output,  may  be  of  interest 
to  statistical  analysis  users, 

David  Andrews  T'rrites: 

"Although  RANDU,  the  SSP  random 
number  generator,  has  not  been  vrell 
received  in  the  statistical 
community,  manv  users  feel  that  it 
is  "adeouate  for  the  present 
purposes".  Such  users  may  be 
interested  in  calculating 

9u  -  6u  +  u 
n  n+1  n+2 

for  any  sequence  of  3  RANDU 
numbers.  Ideally  the  results 
should  be  dense  in  the  region  -6  to 
10,  In  fact,  the  result  turns  out 
to  be  an  integer!  (Try  it).  This 
is  narticularly  disastrous  for 
particle  scientists  (and  others) 
who  use  random  numbers  in  sets  of 
three  to  give  position,  velocity 
and  momentum  coordinates. 


Users  who  find  these  results 
disquieting  may  be  Interested  in  a 
vastly  superior  generator  described 
bv  Lewis  et  al,  IBM  Sys.  J,  8 
(1969)  136-A6." 


Dave  Andrews*  FORTRAN  program 
and  its  output  using  the  routine 
RANDU  appear  below. 


1 

? 

<J06W 

qgqqogS 

DI-^ENSIOn  U(lOl)  »X  (^3) 

IX=3747 

3 

00  1  1=1, ini 

4 

call  RANDU ( IX. IY, YOL) 

5 

IX  =  IY 

(S 

1 

U( I) =YPL 

7 

00  2  1=1,3 

fl 

K=1 

Q 

DO  3  J=I,gg,3 

10 

X(K)=U(J)*9.0-U(J+l)*6.0-ni(J*?) 

1  1 

3 

K  =  K*1 

1? 

KK=K-1 

13 

CALL  SnRT(X,KK) 

14 

WRITE(6,lno)  j 

15 

WRITE  (A,  101 )  X 

16 

2 

CONTINUE 

17 

ion 

FORrATC  »  ,  •  SET  *  ,  2X  ,  I?, /) 

16 

101 

F0RHAT(»  »  ♦  1 0 (FIO.S, IX) ) 

\9 

STOP 

20 

end 

21 

SUOROUTI  -JF  RANDU  ( IX,  IY,YPL) 

2? 

IY  =  IX«'5'^.S39 

23 

If(IY)  S,6,6 

24 

5 

IY=I  Y-,?1474836^7*1 

25 

6 

YPL=IY 

26 

YPL=YPL*.4GES6l3F-g 

27 

RETURN 

28 

END 

29 

SURROUTlNT  SORT  (VI, N) 

30 

PEAL  v] (N) 

C  SHELL  bOHT  ALG^PITHM  CaCH  JULV  1Q64 

31 

1  =  1 

32 

1 

I  =  I^I 

■»3 

IFd.LP.N)  GO  TO  1 

34 

M=I-1 

35 

2 

H=M/2 

36 

TFfH.Fo.O)  HFTiJftM 

37 

K  =  N-M 

36 

DO  4  J=l,f< 

39 

L  =  J 

40 

5 

IF(L.LT.l)  GO  TO  4 

41 

IF(V1  (L)  )  30  TO  4 

42 

X=V1 (L^M) 

43 

VI  (L-*’*^)  =V)  (L) 

44 

VI (L) =X 

45 

L=L“M 

46 

GO  TO  5 

47 

4 

CONTINUE 

46 

60  TO  2 

49 

ENO 
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ITT — r 


-S.OOnnn 

-O.fOOno 

2, nnono 

fi.ooOf'O 
SFT  2 

-4 . OOOOO 

o.onnno 

2.00000 

8.00000 

.  onnno 
0.0  on  0  0 

3,00000 

o.opooo 

- ?. OoooO 

1 .OOooo 
3.00O00 

-3.00000 

1  .  OOOOO 

3. OOOOO 

-2. OOOOO 
1.00000 
4.00000 

-2, Ooooo 

1 .OoooO 
4,00000 

-2. OoooO 

1 .  OOooo 
5.00000 

-1,00000 

1 . ooooo 
8.00000 

-o.ooooo 

2.00000 

6.00000 

-i.OOnno 

1  .OOOOO 
S.ooono 
8.00000 
SET  3 

-4.00000 

1 .oooon 
5.00000 
8.00000 

-3.  OOO'io 

1  .  OOOOO 

5 .  ooooO 
q  ,  ('  0  0  0  0 

■■  -3, ooooO 

1 . 00  300 
8.00300 

-P.OOOon 

1  .OOOOO 
-6.00000 

- 1 . 0  0  0  n  0 

2.  OOOOO 

6.  OOooo 

-1 . Ooooo 
3.0OOOO 

7. OOOOO 

-1 , OoooO 

4, OOooo 

7.  OOOoO 

0,00000 

4,00000 

7.00000 

1.00000 

4.00000 

7.00000 

-3.ooono 
-1  .ooooO 

3.O0OO0 

6.00000 

-3. OoooO 
-1 . OOOOO 
3.00000 
.  7.00000 

-2. OOOOO 
-  1  .  OOOOO 
3.00000 
7.000 00 

-3, OoooO 
-  0 . 0  0  0  0  0 
4.00000 

-'2.00000 
-0  .  OOOOO 
4.OO000 

-2.00000 

0. OOOOO 

4,00000 

-2,00000 

1 , OOOoO 
S.ooonu 

-2. OoooO 

2. OOOOO 

5. OOooO 

-1 . oonoo 
2. ooooo 
6.00000 

-1. ooooo 
3.00000 

6. ooooo 

**  The  three  sets  of  numbers  shown  above  are  the  results 
obtained  by  first  generating  101  random  numbers  using  the 
subroutine  P^ANDU,  then  forming  the  expression 
9U^-6U^^-j +U^+2  sequence  of  3  RANDU  generated 
numbers,  and  finally  partitioning  the  resulting  numbers  into 
3  sets  of  numbers,  ordering  them  into  ascending  sequence  of 
magnitude. 


l^ANDOM  NUT^BER  ContM. 

UTCC  has  more  than  one  random 
number  generating  routine  available 
in  online  S/370  libraries.  Among 
them  are  RANDU2  (modified  SSP 
routine  RANDU) ,  CAUSS2  (modified 
SSP  routine  GAUSS)  and  four 
routines  from  the  IMSL  package  of 
programs,  GGUl,  GGU2,  GGNRF  and 
GGNOR. 

Documentation  itemizing  these 
routines  and  explaining  how  to 
access  them,  can  be  found  in  the 
USERBOOK  modules  entitled 
3.7STATNDEX,  3.7SSPSTAT,  and 
3.7rMSL.  The  statistical  routines 
of  the  IMSL  package  also  include 
other  random  number  generators  that 
might  be  of  interest. 

Dave  Andrews'  short  FORTRAN 
program  modified  by  a  call  to  the 
routine  GGNRF  has  been  used  to 
generate  the  set  of  random  numbers 
below.  The  random  numbers  so 
generated  are  non-integer  and  dense 
in  the  range  -6  to  10. 

Len  Prepas 
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RANDOM  NUTffiER  ContM. 


SFT  1 


-17.  f  47  AP 

-15.3204= 

-16.2=000 

-14  .50197 

-12.0=217 

-5.14=3] 

-  4. C05  =  O 

-4. 92726 

-3. 95679 

0.47441 

1  .37  =  ^0 

3.09479 

4.7=960 

7. 27?1= 

15. 77?4fl 
SET  2 

2C. 5f  757 

31 .2070= 

-27.a3fl?2 

-16.44033 

-16.21770 

-1  4  .50701 

-10.00260 

-6.1  2<’72 

-S.cpcpc; 

- =. 446=4 

-4. 95966 

3.C4.4.Q7 

3  .6’^?4 

4. 24] 02 

5.11749 

5.12604 

9.4=617 
SET  3 

9.621=6 

29.6401 2 

-20. 45^^23 

-1 9.65769 

-16.06478 

-1)  .57459 

-11  .19045 

-5.1 10«3 

-4.195=9 

-  3.  6534<; 

-1. 6=324 

-1.46=49 

5.55592 

6.0720? 

6.3502'' 

6.7C485 

9. 59720 

17.11=49 

17.1753f 

1 8. 04372 

-1 0.060=5 

-0.71432 

-  9. 9  =  =  «0 

-6. 670O6 

-6.25702 

-3 .6576] 

-1.19186 

-P  .972  =  0 

-0.9=700 

-0.10061 

o. 20520 

in.  C=970 

10.1 441 7 

10.  =  6654 

10.7=240 

-10 

.90517 

-10.1 2060 

-0.  00310 

-0.9=260 

-7.  06303 

-n. 

=  41  o= 

0.65999 

1  .639=9 

3.1921 2 

3.49396 

5. 

90O01 

6.  9  =  1  =9 

7.41457 

7.51293 

7.90778 

-0,64467 

-9.55161 

-7.  20795 

-6. 75863 

-5.59440 

-1  .39365 

0.544=5 

1  ,94136 

3.14=63 

3.23962 

9.10402 

11.65901 

11 .97337 

12.47190 

13.25540 

***  The  T)rogram  used  to  generate  the  results  shown  above 
differs  from  Dave  Andrews*  program  only  in  the  area  of  the 
calling  sequence  to  GGN^  (in  place  of  RANDU) .  One  call  to 
GGNRF  replaces  101  calls  to  RANDU, 
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DEBUGGING  ASSE!^IBLY  LANGUAGE  PROGRAMS 


Assembly  language  coding  is  not 
the  most  popular  of  source 
languages  because  of  its  complexity 
of  usage.  There  are,  however, 
certain  types  of  programs  that  lend 
themselves  quite  well  to  assembly 
language  usage.  In  fact,  there  are 
some  applications  that  can  only  be 
done  in  assemblv  language,  e.g. 
problems  in  \-diich  a  specific  number 
of  instructions  roust  be  completed 
within  a  certain  'real  time*.  UTCC 
has  recently  seen  several  hard-to- 
debug  assemblv  language  programs 
and  this  article  outlines  some 
basic  orograraming  techniques  which 
may  assist  the  user  in  debugging 
such  programs. 

A  tremendous  aid  in  assembly 
language  coding  is  standardization 
within  the  various  modules.  The 
user  must  be  aware  of  the  following 
standard  OS  register  usage: 

Register  13  holds  the  address  of 
the  save  area. 

Register  lA  holds  the  address  of 
the  return  point  in  the  calling 
program. 

Register  15  holds  the  entry  point 
address  of  the  called  urogram. 

Register  1  contains  the  address  of 
the  parameter  list  (i.e.  arguments 
to  be  passed  to  the  called  program). 


In  addition,  the  user  should 
standardize  within  his  modules.  If 
Register  12  is  assigned  the  base 
address  value,  and  Register  11  the 
internal  transfer  register,  the 
follovTlng  series  of  calls  could 
result: 

MAIN 

BAL  11,RTN1 
BAL  11,RTN2 


BAL  ll,RTNi 

And  each  Pvoutine,  RTNl,  could  be  of 
the  form: 

STM  (14,12),,* 

BALR  12,0 
USING  *,12 

BR  11 

If  Registers  11  and  12  are  not 
defined  for  any  other  purpose,  and 
the  program  abends,  the  routine  in 
which  the  program  died  (contents  of 
Register  12),  and  the  routine  which 
called  it  (contents  of  Register  11) 
may  be  traced. 

A  user  can,  for  example, 
determine  how  far  in  a  particular 
routine  he  is  by  coding: 

LA  10,* 

When  the  module  abends. 
Register  10  T^7lll  contain  the 
address  of  the  last  instruction 
executed  in  the  module.  This  is 
extremely  useful,  particularly  if 
the  Program  Status  Word  (PSW)  has 
been  clobbered. 


cont 'd. . . 
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DEBUGGING  ASM  ContM. 

A  further  debugging  tool  is  the 
Write-To-Operator  O'JTO)  MACRO 
Instruction,  This  routine  is  used 
to  enter  messages  in  the  system 
log,  as  well  as  to  display 
information  for  the  operator.  The 
output  from  each  such  ’WTO*  that  is 
issued  is  also  included  in  the 
user’s  output  in  the  ’HASP  SYSTEM 
LOG’  section  and  is  thus  available 
for  inspection  by  the  user.  Care 
should  be  taken  not  to  call  this 
routine  too  often  (as  in  a  heavy 
loop) ,  as  it  will  clutter  up  the 
operator’s  screen.  It  can  be  used 
in  the  following  form: 


WTO 

’NOW  AT 

POINT  A’ 

mo 

’NOW  AT 

POINT  B’ 

The 

\\rrO  Routine 

as  used  here 

as 

a  ’sign  on’ 

for  specific 

blocks  of  Instructions  and,  as 
such,  is  a  further  aid  in 
debugging. 

If  you  have  any  questions 
concerning  this  article,  contact 
Herb  Kugel  at  928-7286, 

Herb  Kugel 


lEHMOVE  DANGERS 


The  utility  lEHMOVE  is  used  to 
create  backup  or  unloaded  versions 
of  partitioned  dataset  libraries  on 
magnetic  tape.  Examples  of  its  use 
can  be  found  in  the  TTSERBOOK  module 
entitled  3,4UTILS. 


I-Then  using  this  utility  it  is 
essential  to  choose  the  correct 
option.  Otherx^se,  serious 
programming  problems  or  the  loss  of 
datasets  can  result.  For  example, 
if  the  MOVE  option  is  used  rather 
than  the  COPY  option,  the  dataset 
being  moved  will  be  scratched  even 
if  the  programmer  specified 
DISP= (OLD, KEEP)  on  his  JCL. 

It  should  also  be  noted  that  a 
backup  tape  of  multiple  files  can 
be  destroyed  if  the  user  forgets  to 
specify  the  file  number  of  the  file 
being  moved  or  copied  in  the 
lEHMOVE  control  statements.  Simple 
JCL  here  is  not  enough.  The 
lEHMOVE  control  statements  must  be 
correct  also. 

Users  who  are  planning  to  use 
the  utility  lEHMOVE  should  study 
the  examples  given  in  the  USERBOOK 
module  3.4UTILS  and  refer  to  the 
section  on  lEHMOVE  in  the  IBM 
Utilities  manual,  OS  UTILITIES 
GC28-6586-15.  The  dataset  you  save 
will  be  your  own! 

Any  questions  should  be 
directed  to  Herb  Kugel,  at  928- 
7286. 

Herb  Kugel 


FORTRAN  PROGRAMMING  ARTICLES 
AVAILABLE 


Three  excellent  articles  are 
available  which  provide  useful  tips 
on  optimizing  FORTRAN  programs  and 
on  the  art  of  writing  ’readable’ 
FORTRAN  programs. 


cont *d 
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FORTRAN  PROGRAMMING  ARTICLES  Cont'd. 

The  first  article,  How  to  Write 
A  Readable  FORTRAN  Program  by 
Daniel  D.  McCracken  and  Gerald  M. 
Weinberg,  originallv  appeared  in 
the  October  1972  issue  of 
DATAMATION,  It  deals  with  the  use 
of  comments,  GO  TO  statements,  DO 
loops,  the  use  of  parentheses  and 
manv  other  items  used  in  FORTRAN, 
The  emohasis  in  this  article  is  on 
producing  a  self-documenting 
nrogram. 

The  second  article.  The 
Efficient  Use  of  FORTRAN  by  Chris 
Larson  originallv  anneared  in  the 
August  1971  issue  of  DATAMATION. 
It  deals  with  input /output 
statements,  dimension  statements, 
subscript  usage,  datatypes  and 
conversions  and  external  programs 
and  subprograms. 

The  third  article.  Optimization 
with  FORTRAN  H,  by  C,  Vogt  appeared 
in  the  University  of  Waterloo 
Computer  Centre  Newsletter  of  June, 
1971,  It  deals  mainly  Tvrith  various 
instream  coding  techniques  that 
could  save  both  time  and  core 
(raemorv) , 

Xerox  copies  of  these  three 
articles  are  available  from  the 
Information  Office,  SF128,  Users 
who  are  involved  in  FORTRAN 
applications  and  wish  to  discuss 
debugging  or  optimizing  FORTRAN 
programs  are  invited  to  contact 
Herb  Kugel  at  928-7286, 


HIGH  SPEED  JOB  STREAM  NEWS 


No  charts  or  graphs  are 
available  this  month.  During  the 
changeover  from  >!VT  to  VS,  the 
format  of  the  database  used  to 
produce  these  reports  was  changed. 
Since  part  of  the  data  for  the 
month  was  collected  under  MVT  and 
part  under  VS,  we  are  unable  to 
include  these  statistics, 

Mark  Tapia 


S/370-165-11  RELIABILITY 

The  reliability  statistics  for 
January  indicate  an  uptime 
percentage  of  95,7  while  the 
average  number  of  IPLs  per  day 
reached  2,77,  The  scheduled  hours 
of  production  for  January  totalled 
473,  VS2R2  was  installed  on 
December  30,  1^74  and  withdrawn  on 
January  25,  1975  due  to  severe 
performance  problems.  This 
accounts  for  the  greater  part  of 
the  high  downtime  figure  for 
January, 


cont'd, , , 


Herb  Kugel 
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S/370-165-11  RELIABILITY  Cont 

MONTHLY 

COMPARATIVE 

FIGURi:S 

MONTH 

%  UPTIME 

UNSCHED. 

IPLs /DAY 

JAN/ 74 

97.0 

1.37 

FEB/ 74 

98.3 

1.25 

^AR/74 

P8.7 

1.06 

APR/ 74 

99.3 

0.52 

mY/74 

99.2 

0.87 

.TUN/ 74 

96.1 

0.75 

JUL/74 

91.7 

1.66 

AUG/ 74 

98.3 

0.86 

SEP/ 74 

94.5 

1.83 

OCT/74 

98.6 

1.07 

NOV/ 74 

98.9 

0.93 

DEC/ 74 

97.1 

1.21 

JAN/75 

95.7 

2.77 

The 

percentage 

breakdown 

total  system  downtime  for  January 
was: 

Hardware:  490  minutes  (40,4%) 

SoftT/.7are:  571  minutes  (47.0%) 

Other  :  153  minutes  (12,6%) 

The  maior  events  contributing 
to  these  downtime  totals  were  as 
follows : 

Jan,  2,  3,  6,  13,  23: 

A  total  of  212  minutes  and  19 
IPLs  were  attributed  to  JES2 
Catastrophic  errors.  A  large 
proportion  of  these  errors  were 
caused  bv  a  lack  of  SOS  and  a 
number  of  user  jobs  which  would 
fill  the  JES2  spool  volume. 


Jan,  13: 

A  total  of  120  minutes  and  1 
IPL  were  attributed  to  a  tripped 
circuit  breaker  in  the  main 
console.  A  power  supply  was 
replaced  by  IBM  in  the  3066, 

Jan.  21 

A  total  of  285  minutes  and  1 
IPL  were  attributed  to  a  system 
loop  on  the  3704  control  unit.  A 
major  part  of  the  downtime  was 
required  by  IBM  to  trace  the  source 
of  the  problem  through  the 
suspected  channel. 


Paul  Scarborough 


IITCC  #121 


SYSmi/370  SERVICES 


Page  17 


QQUSnUE.EEEQRl.Qa _ ELiHl-.EQE.iAS.li 


REIPLSiFREQ)  // 

DOUSTIHE 

{HS) 

1 

DHJ 

REIPL 

DRTIHE 

0  5  10  15  20  25 

30  35  40 

45  50 

55  60 

65 

70 

75 

80 

85  90 

95  lOOl 

s 

U 

1 

( CESTER 

CLOSED ) 

1 

1 

7 

2 

10 

121 

1 

F 

3 

4 

35 

S 

4 

1 

10 

j  P*  ««****«* 

1 

S 

S 

0 

0 

1 

1 

H 

6 

9 

91 

1 

T 

7 

4 

22 

1 

V 

8 

2 

17 

1 pp**. «**••♦«**•** 

1 

T 

9 

5 

50 

1 

F 

10 

6 

45 

1 

S 

ll 

0 

10 

1  ********** 

1 

.9 

12 

1 

7 

1  P*  *  «  «  * • 

1 

M 

13 

3 

203 

T 

14 

4 

29 

IBPPP. 

' 

1 

W 

1  s 

1 

5 

IP**** 

1 

T 

16 

6 

34 

IHPKRHa* ••••**• ***•*•••**** 

1 

F 

17 

4 

22 

1 pppp*** ***••*• •*•••**• 

1 

S 

18 

2 

15 

1PP*.*.*******t»* 

1 

S 

19 

1 

5 

IS**** 

1 

H 

20 

1 

15 

) s************** 

1 

T 

21 

3 

300 

U 

22 

1 

9 

IP******** 

1 

T 

23 

6 

75 

1 

F 

24 

2 

15 

IHB*********..*. 

1 

S 

25 

1 

13 

1 

5 

26 

0 

0 

1 

1 

H 

27 

0 

0 

I 

1 

T 

28 

3 

38 

IRBB*., 

1 

W 

29 

3 

25 

legp*********. •*••*. •.*••• 

1 

T 

30 

0 

3 

I*** 

1 

F 

31 

0 

0 

1 

1 

LEGESD  : 

OSS  □  = 

OSS  REIPL 

\ 

1 

OSS  •  =OSS  MISVTE  OF  DOUSTIHE 


.ELili..QQKSUH&&.QMlSQ.iAS.li 

1 

Tins 

OF  DAI  (BOURS) 

1 

1 

DAI 

RELOADS  DSTIHS 

0  12 

3 

4  5-67 

8  9  10 

11  12  13  14  15  16  17  18 

19  20 

21  22  23 

^•*1 

1 

W 

1 

(CESTER  CLOSED) 

1 

1 

1 

T 

2 

10 

121 

1 

I  S 

3  3 

3 

33  3  3  S3 

3^ 

3  " 

1 

1 

F 

3 

4 

35 

1  I  s 

s 

3  3 

• 

1 

1 

S 

4 

1 

10 

1 

a 

1 

1 

S 

5 

0 

0 

1 

1 

1 

H 

6 

9 

91 

1 

33 

3  B  as  3  3  3 

1 

1 

7 

7 

4 

22 

1 

3 

0 

3  3 

1 

1 

U 

8 

2 

17 

1  I 

3  3 

1 

1 

7 

9 

5 

50 

1  I 

3  0  0  3  S 

1 

1 

F 

10 

6 

45 

1 

3 

S3  SO 

3 

1 

1 

S 

11 

0 

10 

1 

I 

1 

1 

S 

12 

1 

7 

I 

3 

1 

1 

H 

13 

3 

203 

1  ss 

II 

333  BBRBaaRB 

1 

1 

7 

14 

4 

29 

1 

3 

3 

3  3 

1 

1 

V 

15 

1 

5 

1 

3 

1 

1 

7 

16 

6 

34 

1  I 

s 

R 

BR  a 

3 

1 

1 

F 

17 

4 

22 

1  0 

0 

3  0 

1 

1 

S 

18 

2 

15 

1 

a 

1 

1 

S 

19 

1 

5 

1 

3 

1 

1 

H 

20 

1 

15 

1 

I  3 

1 

1 

7 

21 

3 

300 

1  RnHttBBHaaaauBBBaBBB 

3  3 

a 

1 

1 

U 

22 

1 

9 

1  / 

3 

1 

1 

7 

23 

6 

75 

1 

0 

an 

SSS 

0 

1 

1 

F 

24 

2 

15 

1 

3 

3 

1 

1 

S 

25 

1 

13 

1 

3 

1 

1 

S 

26 

0 

0 

1 

1 

1 

H 

27 

0 

0 

1 

1 

1 

7 

28 

3 

38 

1 

I  0 

3  3 

1 

1 

U 

29 

3 

25 

1 

33 

S 

1 

7 

30 

0 

3 

1 

I 

1 

F 

31 

0 

0 

1 

LEGESD 

!  R 

FOR  RARDUARE 

S 

FOR  SOFTWARE 

STATISTICS 

0 

FOR  OPERATIOSAL 

U 

FOR  USBXPLAISED 

I 

FOR  LATE 

IPL 

TOTAL  SC REDD LED 

ROURS  OF  PRODUCT lOS  i  473 

TOTAL  DOUSTIHE 

(HS)  1  1214 

,  AVG/DAI  :  40.47  .  AVG/PROD 

SOUR  1 

1.28 

TOTAL  REIPL' 3 

1  83 

,  AVG/DAI  :  2.77 

DOUSTIHE  RATS  13  i  >^.71 

PERCESt  OF  SCEEDVLED  PRODUCTIOS  SOURS 

UTCC  NL  #121 


INTERACTIVE  TERMINAL  SYSTEMS 


Page  18 


INTERACTIVE  SYSTEMS  RELIABILITY 


The  uptimes  achieved  for  the 
month  of  January  for  each  of  APL, 
ATS,  and  CPS  Trere  98.45%,  98.90% 
and  98.79%  of  scheduled  operation, 
respectively.  The  number  of 
scheduled  hours  of  operation  during 
the  month  of  January  totalled  493, 
while  the  number  of  unscheduled 
IPL*s  per  day  was  0.29.  In 
addition  to  the  scheduled  time, 
APL,  ATS  and  CPS  were  also 
available  for  anproxlmately  141 
hours  of  unattended  weekend 
operation.  The  major  events 
contributing  to  dormtlme  were  as 
follows: 


Jan  26:  On  Sunday,  a  late 

start  was  caused  by 
an  operating 
oversight,  resulting 
in  70,  80  and  85 
minutes  delay  in 
scheduled  time  for 
APL,  ATS  and  CPS, 
respectively. 

The  following  table  summarizes 
the  time  lost  out  of  scheduled 
hours  of  production  due  to  system 
failures  for  each  of  the  systems. 
Nine  unscheduled  IPL®s  were 
required  as  a  result  of  the 
failures. 

Kam  Jain 


Jan  9:  APL  File  Subsystem 


accepted  user  request 
before  system 

Initialization  was 
complete.  The  user 
parameter  over 1 aye d 
the  perflle  TIFI 
entry,  later  causing 
it  to  be  zeroed. 

Jan  10:  IBM  maintenance  was 

scheduled  at  12:30  to 
replace  defective 
temperature 
controller  in  order 
to  correct 

intermittant  storage 
protect  errors. 

Jan  13,14,16:  Some  interface 

problems  caused  CPU 
to  enter  solid  system 
state.  The  problem 
V7as  finally  resolved 
on  January  17  by 
replacing  a  suspected 
card  in  3705  T,7hlch 
controls  tag  and  I/O 
operations. 


DAIS 

DOWNTIME 

AH. 
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"STATE  OF  THE  ART  IN  COMPUTER 
TECHNOLOGY"  SEMINAR 


The  Digital  Equipment 
Corporation  of  Canada  (DEC)  will  be 
presenting  a  seminar  on  the  "state 
of  the  art  in  computer  technology" 
on  Thursdav,  March  6th  at  2  p.m.  in 
the  Galbraith  building,  room  248. 

The  seminar  will  be  given  by 
Mr,  Bill  Demmer,  Tianager  of  the 
Medium  Systems  division  of  DEC  and 
by  Dr.  David  Nelson  of  the  Systems 
Architecture  and  Design  division  of 
DEC,  The  topics  which  will  be 
covered  include: 

-  Micro  Processors  and  Computers 
on  a  board 

-  Cache  memory  -  design 
philosophy  of  the  PDP-11/70 

Writeable  Control  Store  and 
distributed  processing  in 
computer  networks 

This  seminar  should  be  of  major 
interest  to  all  minicomputer  users 
at  the  University  of  Toronto  and  to 
those  interested  in  current 
minicomputer  technology. 


Dennis  Smith 
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APLFOR  SCIENTISTS  AND  ENGINEERS 


Ernst  Goetze  will  be  presenting  an  APL  course  for 
engineers  and  scientists  on  March  24,  26  and  28.  For 

further  information  on  this  course,  see  the  General  News 
section  in  this  issue  of  COMPUTERNEWS . 

Don  Gibson 


DIAXOGUE;  DATATALK  QUICK  QUERIES 


Each  month,  the  University  of  Toronto  DATATALK  features 
dialogues  drawn  from  actual  and  simulated  DATATALK 
conversational  computing  experiences. 

TJe  hope  that  these  examples  will  encourage  users  to  find 
new  and  better  ways  in  which  to  use  DATATALK  services. 

DATATALK:  Good  morning,  DATATALK  services,  Ernst  Goetze 
speaking. 

C:  Hello... What  is  the  average  of  8.8,  11,87,  7.8,  11.47, 

8.87,  12.53,  8.6,  12.47,  7.93,  11.93,  8.27,  12.0,  8.47, 
11.33,  8.93? 

D:  10.08 

C:  The  standard  deviation? 

D:  1.85 

C:  ^-That  is  the  range? 

D:  4.73 

C:  How  many  standard  deviations  is  that? 

D:  2.6 

C:  Ah, ..How  many  standard  deviations  is  the  largest  deviation? 
D:  1,3 

C:  Is  there  a  significant  difference  from  the  mean  10.5? 

D:  The  T-value  on  14  degrees  of  freedom  is  0,870, 

C;  Is  that  significant? 

D:  No,  not  at  the  5  ner  cent  level, 

C:  Well,  OK, ,, Thank  you. ..Ah,  by  the  way,  one  other  thing, 
how  many  of  the  observations  are  in  excess  of  the  mean? 

D:  8 
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DIALOCUES 


Cont'd 


DATATALK:  Good  morning,  DATATALK  services,. , 

C:  \^at  are  the  roots  of  the  nolynomial,  zero  equals  0,85 
plus  192.25  X  plus  4.48  X-squared  plus  7.63  X-cubed  plus 
X  to  the  fourth? 

(0  =  0.85  +  192.25  X  +  4.48  X*2  +  7.63  X*3  +  X*4) 

D:  There  are  t^To  real  roats  and  a  pair  of  conjugate  complex 
roots.  The  real  roots  are  9.3492  and  -0,0044218,  Also, 
the  complex  roots  are  0.86183  +  t 4,44518  and  the  conjugate 
of  that. 

C:  How  accurate  are  those? 

D:  I  don’t  really  know. .  .hox-rever ,  if  I  evaluate  the  polynomial 

on  the  two  real  roots  in  double-nrecision  arithmetic,  I 
get... about  10*-11  and  10*-14,  respectively, 

D:  Moreover,  if  I  evaluate  the  polynomial  on  the  complex 

root,  I  get  a  complex  number  with  real  part  about  10*-13 
and  Imaginary  part  about  10*-12! 

C:  Oh,  well! .. .That ’s  fine.  Thank  you  very  much. 


DATATALK:  Good  morning,  DATATALK  services.,.. 

C:  Good  morning. .  .I'Jhat  is  the  integral  of  arctan  X  plus  one 
half  minus  arctan  X  minus ’one  half,  between  minus  one  and 
one? 


-1 

D:  Gauss  quadrature  on  12  and  24  points  agree  that  the  value 
of  the  integral  is  1,529222. 


DATATALK:  Good  morning,  DATATALK  services,, , 

C:  One  other  thing... Glad  I  got  back  to  you  right  away... What 
is  the  maximum  value  of  that  function? 

D:  It  occurs  at  X=0.0  and  is  0.927295. 


cont’d 
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DIAI.OGUES 


Cont  *  d . 


DATATALK:  Good  morning,  DATATALK  services,. , 
C:  Hi!  Is  there  a  solution  to  the  equations 


0.6  XI  +  0.3  X2  +  1.2  X3  =  2.97 

1.0  XI  +  1.0  X2  +  3.0  X3  =  7.0 

1.2  XI  +  1.5  X2  +  4.2  X3  =  9.63 

D:  Yes,  there  is,..Xl=5.9,  X2=10,l  and  X3=-3,0 
C:  Is  that  the  only  solution? 

D;  No.,,The  rank  is  two... in  which  case  it  is  suprising  that 
there  is  a  solution  in  the  first  place.  However,  since 
there  is... there  are  actually  infinitely  many  other  . 
solutions. 


DATATALK:  Good  morning,  DATATALK  services... 

C:  Hello, , .IJhere  is  the  function  X  to  the  X  plus  1  minus  X 
minus  1  equal  to  zero? 

(0-(X*X+l)-(X+l)) 

D:  At  the  point  X  equals  1.441375 
*■  • 
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Registration  for  **APL  for  Scientists  and  Engineers”  Course 

Please  enroll  me  in  this  course, 

I  am  I  I  Faculty  □  Grad  student  □  Staff 
Department:  _  U.  of  T.  phone  _ 


THIS  BOX  IS  FOR  COMPUTER  CENTRE  USE 

□  ACCEPTED  □  WE  REGRET  THAT  THE  COURSE  IS  FULL 
COURSE  MEETS  IN 


MAILING  ADDRESS:  Please  enter  your  name  and  address  below. 

Use  a  campus  address  if  you  have  one.  Be 
precise  as  this  address  will  be  used  to 
return  this  form  to  you. 


UNIVERSITY  OF  TORONTO 
COMPUTER  CENTRE 
TORONTO,  CANADA 


SEND  TO: 
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APL  Course 
Computer  Centre 
Room  128 

Sir  Sandford  Fleming  Lab. 
University  of  Toronto 
TORONTO,  Ontario 
M5S  lAl 
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UTCC  CO'fPUTER  EOUIPMENT 


SYSTEM/370  vni)KL  165-11 

-  located  In  SF103/105/112 

-  provides  Oeneral  Purnose  Job  Stream,  High  Speed  Job  Stream 
and  TSO  services 

-  3072K  bvtes  of  memory 

-  1  drum 

-  13  disk  drives  (3330) 

-  8  disk  drives  (2314) 

-  6  magnetic  tape  drives  (4  9- track  and  2  7-track) 

-  6  display  consoles 

-  6  printers 

-  5  card  readers 

-  1  card  punch 

-  8  remote  batch  terminals 

-  1  paner  tape  reader 

-  Calcomp  plotters  (11"  and  30") 

-  Gould  plotter  (11") 

-  0S/*i''T'Td.th  HASP 


SYSTEit/360  ^CTEL  65 


-  located  in  McLennan  Phvslcal  Laboratories 

-  provides  Interactive  Systems  Service 

-  1536K  bytes  of  core 

-  24  disk  drives  (2314) 

-  3  9-track  magnetic  tane  drives 

-  1  printer 

-  1  card  reader 

-  1  card  punch 

'-  140  tvnewrlter  terminals 

-  OS/Mirr  TdLth  APL,  ATS  and  CPS 


7094  II 

-  located  in  Room  1203  Burton  Tower 

-  32K  words  of  core 

-  1  disk 

-  8  magnetic  tape  drives 

-  Input/output  via  a  1401  computer 


COMPUTER  RESEARCH  FACILITY 

-  located  in  SF207 

-  DEC  GT44  S vs terns  with 

-  1  PDP-11 /40  CPU 

“  2  9-track  dual  density  tape  drives 

-  1  1000  cpm  card  reader 

-  VT17  graphics  display  unit 

-  1  lab.  peripheral  system  with  A/D  &  D/A 

-  DEC  GT40  System  ^xlth 

-  1  PDP-11/10  CPU 

-  1  2314  tape  disk  drive 

-  1  10^12  graphic  display  unit 

-  9-track/800  BPI  tape  drive 

-  1  Calcomp  microfilm  plotter 

-  2  digitizing  tablets 

-  1  2701  data  adapter  with  RADDTS 
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OTCC  pnacToior 


nptECTOR 

John  C.  Wilson 
ASSOCIATE  PIRECTOR 
A1  Hevworth 

A!)MTNIST>ATIOK  MANAGER 

Anthonv  Pleterse 

INEOR^IATIOK  QREICE 

Ceneral  Inquiries 
Don  Clhson 

MVRACER,  SERVICES 

Stan  Yagl 

SDRERVISOP.  MARKETING  SERVICES 
Dave  Scoble 

TIPrT-nTAL  CO-ORDIHATORS 

Sandford  Elenrlng  Tenainal 
’'ark  Tapia 
PrograH  Advisors 

Erlndale 

Vaughan  Lawrason 

Scarborough 

Ralph  Lombardi 

Arts  and  Science 
•Darlene  Dononey 

•'anagenent  Studies 
Paul  Roth 

’lANACE”.  SUPPORT  SER^CES 
Jovce  Walton 
»*ANACER.  OPERATIONS 

Derrv  Cox 
MANACER,  SYSTEMS 

Rein  Mlkkor 

SYSTTPt  ?lAPJ)tfARE  STTPERVISOR 


ROOM  PHOJJE 

928- 


SF143  6496 


SF116  4936 


S^137  8948 


SF128  4990  or  4991 

SF128A 


49  St.Ceo  7331 


49  St. Geo  6877 


SF125  7109 

SF117  3599 

828-5311 

284-3173 

SS2104  6509 

4917 

49  St. Geo  6875 

SF113  7092 

SF113  5058 


MANAGER.  7094  SERVICES 

Jovce  Walton 

Sunervlsor 

(7094) 

MANAGER.  COMPUTER  RESEARCH  FACILITY 

Dennis  Snitb 
LAB  CO-ORDINATOR  (CRF) 

Krishna  Patnalk 
CONTRACT  PROGRAMMING 

Bill  Greene 
AUTHORIZATION  CLERK 

Yvonne  Bowen 


49  St. Gee  6875 
NP1207  7094 

SF214B  4800 

SR207  8858 

SF214C  2694 

SF139  8703 


JOB  ANO  SYSTEM  STATUS  ODERIES 


SYSTEM/370,  TSO  7373 
AIS/APL  6234 
7094  7094 
2741  TERMINAL  MALFUNCTIONS  7107 
029  KEYPUNCH  MALFUNCTIONS  6465 

SERVICES 

DIAL-UP  ADVICE 
”  •  — — — 

APL  7200  6710 
ATS  7100  7107 
TSO  -  2741  7303  8599 
TSO  -  tty  (10  cps)  7390  8599 
TSO  -  TTY  OO  cps)  7386  8599 
DATATALK  6710  6710 


Eugene  Slclunas 


SF113 


4'Mi7 
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1207 
70'-4  User 
Services 


1203 

7C94  CooputeT  Synea 


1202 
TrrslivU 
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